home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
tool_inc.zip
/
VARSTR.INT
< prev
next >
Wrap
Text File
|
1989-06-02
|
376b
|
13 lines
type
varstring = ^longstring;
procedure releasestr( var str: varstring);
(* release the memory used by a varstring variable. variable MUST
be pre-allocated or the program may crash!!! *)
procedure savestr( var tostr: varstring;
from: longstring);
(* save a regular string in a varstring; new allocation of varstring *)